(ns conducta.bdd)

;; TODO Still debating on lowercasing all BDD constructs ...
(defn User-story
  ([exp] (println exp))
)

;; Minimalist implementation for now: log to console 
;; TODO Use clj's polymorhism to print to an XML, an output stream, etc.
(defn Scenario [text] (println "   " text))
(defn Given [text] (println "       Given " text))
(defn When [text] (println  "       When " text))
(defn Then [text] (println  "       Then " text))
(defn And [text] (println   "       and " text))
